use LWP::Simple;
use Encode;

$doc = '1
2
3
4
5 5asdgjglyu';
#$doc=~s/html/body/g;
$doc=~s/1.+5/ /gs;
print($doc);
print "\n----------------------\n";


$doc = '1 2	3455asdgjglyu';
#$doc=~s/html/body/g;
$doc=~s/1.+5/ /gs;
print($doc);
print "\n----------------------\n";
